Top 10k strings from American Football (1984)(Mind Games)[a].z80 in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [Z80] /

Back to the directory listing

  20 DB 00011000B
  11 DB 00111100B
   3 DB 00011100B
   3 B0=J+(B1=J):
   2 Z$="LOSES ":
   2 Z$="GAINS ":
   2 YTG=YTG-GN:
   2 SF=I(OT,DT,J)+
   2 R+":"+("0"
   2 R(I(OT,DT,2
   2 J,O;" ";X$;" START FROM THEIR 20 ":
   2 DT=J+(Z>40
   2 DB 00111000B
   2 "23296",O:
   2  NO YARDAGE GAINED!
   1 Z$=X$+" DEFENCE?"
   1 Z$="TAILS"
   1 Z$="HEADS":
   1 Z$=" PUNT "
   1 Z$=" KICK ":
   1 Z$;" - ";;D$(DT):
   1 YTG=YTG-YD:
   1 YTG=YTG-GN
   1 YTG=YTG+YD
   1 X,Y+I;X$(I+J):
   1 X$=X$+" to call -"
   1 X$=X$+" WIN AND WILL RECEIVE":
   1 X$=X$+" STATISTICS ":
   1 X$=T$(J+(Z$=Y$)):
   1 X$=T$(B0):
   1 X$=T$(B(J)):
   1 X$="You may name both teams":
   1 X$="You may call -":
   1 X$="We will toss the coin":
   1 X$="NAME YOUR TEAMS"
   1 X$="H for HEADS or T for TAILS":
   1 X$="2 - PLAYER versus PLAYER":
   1 X$="1 - PLAYER versus SPECTRUM":
   1 X$=" YOUR":
   1 X$=" YOUR TEAM   -   ":
   1 X$=" THE SCORE IS TIED ":
   1 X$=" Select Game Type (1 or 2)":
   1 X$=" SPECTRUM TEAM - ":
   1 X$=" HALF-TIME"
   1 X$=" GAME"
   1 X$=" FINAL":
   1 X$=" 0:00":
   1 X$=" ** TOUCHDOWN FOR "+X$+" ** ":
   1 X$=" ** INSTRUCTIONS ** ":
   1 X$=" ## APS  AMERICAN FOOTBALL ## ":
   1 X$=" "+X$+" CHOSE "+Z$+" ":
   1 X$="   TEAM TWO  -   "
   1 X$="   TEAM ONE  -   "
   1 U(B1)=U(B1)+J
   1 T(R)=T(R)-J:
   1 SUDDEN-DEATH EXTRA TIME PERIOD
   1 SF=(SF+100
   1 S(B1)=S(B1)+J:
   1 S(B1)=S(B1)+6
   1 S(B1)=S(B1)+3
   1 S(B0)=S(B0)+2
   1 RUN   PASS  BLITZ SHORT X
   1 R(Z)+B+SF/10
   1 QTR=QTR+J:
   1 PENALTY:NUM-YD
   1 PASS:ATTD-COMP
   1 O,O;" PASS INTERCEPTED IN END ZONE - ";
   1 O,O;" ";X$;" RECEIVE ON ";YD;" YD LN "
   1 O,O;" ";X$;" QUARTERBACK SACKED! ";
   1 O,O;"  THE KICK GOES INTO END ZONE    ";X$;" START FROM THEIR 20 ";:
   1 O,O;"    END OF GAME
   1 O,J;" YOUR"
   1 O,J;" ";YD;" YD PENALTY ON ";X$;" "
   1 O,J;" ";X$;" PASS INTERCEPTED! ":
   1 O,J;" ";X$;" CHOOSE FIELDGOAL "
   1 O,J;" ";X$;" CHOOSE ";O$(OT);" ":
   1 J;" FIRST DOWN FOR ";X$;" ":
   1 J;" *TOUCHDOWN* ":
   1 J;" ** TWO MINUTE WARNING ** ":
   1 J;" ** TOUCHDOWN ** ":
   1 J;" ";X$;" FUMBLE ! ":
   1 J;" ";T$(R);" TAKE A TIMEOUT ":
   1 J;"  WOULD YOU LIKE TO PLAY AGAIN? "
   1 J;"  END OF QUARTER ";Z;"  ":
   1 J;"  END OF 1st HALF  ":
   1 J;"    ";X$;" RUN BACK FOR A   ";
   1 J,O;X$;X$;Y$;X$;"
   1 J,O;X$;" CHOOSE TO ";O$(OT)
   1 J,O;"AND RUN BACK FOR A ";
   1 J,O;"AND ";X$;" RECOVER THE BALL":
   1 J,O;" PLAY LOSES ";
   1 J,O;" ** FIELDGOAL FOR ";T$(B1);" ** ":
   1 J,O;" ";X$;" START FROM THEIR ";B(2
   1 J,O;" ";X$;" CAUGHT FOR A SAFETY "
   1 J,O;"   DO YOU WANT INSTRUCTIONS?    ":
   1 J,O;"    AND RUN BACK ";GN;" YARDS
   1 J,J;" FIRST DOWN ON ";X$;" ";B(2
   1 J,J;" BALL TO ";X$;" ON DOWNS ":
   1 J,J;" ";X$;" RUN BACK ";GN;" YARDS "
   1 J,J;" ";X$;" CHOOSE ";D$(DT);
   1 J,J;"  ILLEGAL PLAY - TRY AGAIN  ":
   1 GN;" YARDS ":
   1 GN;" YARD";"S"
   1 F'GOAL:ATT-MDE
   1 DT=J+(Z>45
   1 DT=J+(Z>30
   1 DT=J+(Z>15
   1 DT=J+(Z>10
   1 DB 11110000B
   1 DB 10010000B
   1 DB 00010000B
   1 DB 00001111B,0
   1 DB 00001001B,1
   1 DB 00001001B,0
   1 DB 00001000B,01
   1 DB 00001000B
   1 D(B1,J)=D(B1,J)+J:
   1 B1=J+(Z$=Y$):
   1 B1=J+(TR=J):
   1 B(J)=J+(B(J)=J)
   1 == OTHER COMMANDS ==  
   1 == OFFENCE  PLAYS ==  
   1 == DEFENCE  PLAYS ==  
   1 ;T(R);" LEFT IN THIS HALF"
   1 ;D(J,J)+D(J,2
   1 ;"TEAMS CHANGE ENDS":
   1 ;"PRESS ANY KEY TO CONTINUE"
   1 ;"BUT THEY RECOVER":
   1 ;"(PRESS 'P' FOR PRINTOUT)";
   1 ;"(MAXIMUM 10 LETTERS)":
   1 ;" TO ";X$;" ";B(2
   1 ;" POINT AFTER GOOD ":
   1 ;" POINT AFTER FAILED ":
   1 ;" PLAY ";Z$;GN;" YARD";"S"
   1 ;" PLAY ";Z$;
   1 ;" OFFENCE?":
   1 ;" HALF DISTANCE TO GOAL LINE "
   1 ;" FIELDGOAL ATTEMPT FAILS! ":
   1 ;" - ";O$(OT)
   1 ;" ";X$;Z$;GN;" YARDS"
   1 ;" ";X$;" RETURN IT FOR A ";
   1 ;" ";X$;" RETURN IT ";GN;" YARDS":
   1 ;" ";X$;" PASS INCOMPLETE ":
   1 ;" ";X$;" PASS COMPLETE "
   1 ;"  YOU HAVE 2 TIMEOUTS  ";
   1 ;"  THE KICK IS SHORT!  "
   1 ;"  GOODBYE  ";
   1 ;"  ";X$;" KICK OFF  "
   1 ;"   PENALTY ON ";X$;" -  ";
   1 ;"    PRESS ANY KEY TO CONTINUE   "
   1 ; Side 2 - Player 01
   1 ; Side 1 - Player 01
   1 ; Player/sprite workarea
   1 57344,8192
   1 01B,10010000B
   1 010B,00010000B
   1 ,O;"You take the role of Team Coach and have to lead your side in   the tactical battle against the Opposing Team."
   1 ,O;"  PRESS ENTER TO CLEAR COMPUTER ":
   1 *(B(J)=F(2
   1 )>S(J))*(ST=O);S(2
   1 );"-";D(J,6
   1 );"-";D(J,17
   1 );"-";D(J,14
   1 );"-";D(J,13
   1 );" YARD LINE ":
   1 )/D(I,J)+0.5
   1 ))*(ST=O);T$(J);" ";S(J);
   1 (YTG*(YTG<0
   1 '"You need to make the strategic  decisions necessary for your    team to keep or gain posession  of the ball and to score those  all important touchdowns."
   1 '"Available to you is a choice of 8 Offence and 4 Defence plays,  as well as Punt, Kick, Fieldgoalattempt or Timeout options."''"Let's have a look at them ...."
   1 #^#V#N#F# 
   1 "RUN","PASS","BLITZ","SHORT"
   1 "RU","PA","BL","SH","TO"
   1 "BOMB","POCKET","SHOTGUN","SCREEN","CENTRE","DRAW","SWEEP","REVERSE","PUNT","KICK","FIELD GOAL","TIMEOUT"
   1 "BO","PO","SH","SC","CE","DR","SW","RE","PU","KI","FG","TO"
   1 ";X$;Y$;X$;X$
   1 "23328",GN
   1 "23320",IP:
   1 "23319",ZX:
   1 "23300"+(B1=J)*3
   1 "23300"+(B1=2
   1 "23300"+(B0=J)*3
   1 "23300"+(B0=2
   1  YARDS TO GO
   1  TOUCHDOWN
   1  TIMEOUT   
   1  TIME LEFT   :
   1  THE GAME MOVES INTO A 15 MIN 
   1  STATISTICS
   1  SHOTGUN    SCREEN
   1  SHOTGUN  
   1  SHORT    
   1  REVERSE    PUNT
   1  INTERCEPTIONS
   1  FUMBLS-RECOVS
   1  FIELD GOAL TIMEOUT    
   1  FIELD GOAL ATTEMPT  
   1  END OF GAME    ":
   1  CENTRE   
   1   YARDS/PUNT  
   1   YARDS/PASS  
   1   TOTAL YARDS 
   1   Q.B. SACKS  
   1   PASS YARDS  
   1   FIRST DOWNS 
   1    YARDS/RUN  
   1    RUN YARDS